home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CICA 1995 August
/
CICA - The Ultimate Collection of Shareware for Windows (Disc 2) (August 1995).iso
/
disc2
/
demo
/
tgdemo.exe
/
TGDEMO.FRM
(
.txt
)
< prev
next >
Wrap
Visual Basic Form
|
1993-08-04
|
4KB
|
136 lines
DemoNav
TrueGrid Demo Navigator
wwwwwwwwwwwwwwwwwwwwwp
wwwwwwwwwwwwwp
wwwwww
wwwwwwpfn
`wwwwww
wwwwww
wwwwww
wwwwwww
wwwwwww
wwwwwwwwwwww
wwwwwwwwwwwwp
wwwwwwwwwwwww
f`wwwwwwwwwwwww
`wwwwwwwwwwwwwp
`wwwww
wwwpwp
wwwpww
wwwpw
wwwpwww
wwwpww
wwwwwwww
wwpww
wwwDwwwwwwwwwwwwwwt
Gwwwppwp
wwwppw
ppwwwww
wwwwppw
wwwwwwwwppw
wwwww"wwpp
wwwUwr
'wpwwwwwwwwu
wwwwwww}
wwwwwwwwwwww
wwwwwwwwwwwwwwwwwwww
Form15<
TextArea
MTrueDemo Copyright (c) Apex Software Corporation, 1993. All rights reserved.
MS Sans Serif
TryIt
Try It
ScrollBar
Title
Intro
Form_LoadN
Form_Resize[
HScroll1_Change
TextArea
Width
ScrollWidth
Height
ScrollHeight
TryIt
Titlem
ScrollBar
Right
DemoNav
ScaleWidth
ScaleHeightN
OrigFormWidth
WindowStatei
DEMOCOUNT
ScrollBar_Change
Value
Enabled
DEMOTEXTFILE
OpenDemoText
DT_FH
CloseDemoText
Form_Unload
Cancel(
directory
FullPath
CopyDemoText
idstring
target
Control
GetLine
ltxtd
DT_FN
final
Captionf
DemoText
GetDemoText
FileLength
ourpath
TryIt_Click
ForeColor,
BLACKI
Demo1z
DemoInAction
QuitCurrentDemo
Screen
MousePointer
HOURGLASS
DEFAULT
Demo2
GetDemoForm
DemoForm
Form_KeyDown
KeyCode
Shift
Form_Activate
OrigFormWidth keeps track of the original width so we
don't resize below that.k
TGDEMO.TXT contains the demo text descriptions for the
navigator window.
TGDEMO.TXT
Form_Load
Move to the proper directory so that no pathnames
need to be specified.
Read in the complete demo text, then display thee
intro pagee
Intro
Form_Resize
When resizing the form, move all of the controlse
to a pleasing position and resize the text display
area.
GetDemoText
Read in TGDEMO.TXT and fill the DemoText variable
with the complete navigator text.
ScrollBar_Change
Whenever the demo scrollbar is moved, cancel anya
current demo, then move to the selected demo
number. Copy the demo text to the text area.
Intro
Demo #
TryIt_Click
If the caption is "Done" then we are quitting a
demo.
Otherwise, we're starting a demo. Show the demo form,
then copy the "demo executing" text to the displayo
area and make it BLUE so the user can easilyi
tell what mode they are in.